home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / DEF / Define / Sections / def-section < prev    next >
Text File  |  1998-10-23  |  2KB  |  56 lines
  1. def-section section defaults instruments
  2.  
  3. This lets you define a section. You give first the default values, which are used by all instruments in this section. Next comes the instruments and their classes, which differ from the default values.
  4.  
  5. (def-section sect-a
  6.    default
  7.       zone '(1/1 1/1)
  8.       tonality (activate-tonality (major c 4))
  9.       length '(1/16)
  10.       velocity '(64)
  11.    piano
  12.       symbol '(a b c) 
  13.    synth-group 
  14.       symbol '(-b -c -d)
  15. )
  16.  
  17. Combining def-section with clone-section allows a natural-like composing method, where you start with an idea, and then let it evolute toward final target. When you want to play sections to a MIDI file, this is done most easily with play-file.
  18.  
  19. The instrument can be a single instrument, or instrument group defined with def-orchestra. The properties are inherited to all sub-groups and instruments of the group.
  20.  
  21. Def-section has default slot and instrument slots. tempo-zone can be only in
  22. the default slot, there cannot be individual midi tempos for each instrument
  23.  
  24. To have a section that lasts 16 bars, has tempo value for each bar, is
  25. written this way. Default gives value for all instruments that have no
  26. definition in this slot, here zone and tonality are used for all instruments.
  27.  
  28. (def-section study
  29.    default
  30.       zone (gen-repeat 16 '(1/1))
  31.       tonality (activate-tonality (major c 4))
  32.       tempo-zones (gen-repeat 16 '(1/1))
  33.       tempo       (vector-to-list 
  34.                     (vector-scale 40 80 
  35.                       (vector-resynthesize 2 
  36.                         (gen-noise-white 16 1 0.123) nil t)))
  37.    piano
  38.       channel 1
  39.       symbol '(a b c)
  40.       length '(1/16 1/8)
  41.       duration '(1/4 1/2)
  42.       velocity '(64)
  43.       tuning '(-10 10 0)
  44.       program 16
  45.       controller
  46.          (gm-controllers ;<-- use your synth controller setup
  47.              main-volume (list (vector-round 50 90 
  48.                                    (gen-sin 1 0.3 32))))
  49. )
  50.  
  51. ;When you use nil file name then output goes to "song midi" file in
  52. ;the same directory where the file is located.
  53.  
  54. (play-file-p nil
  55.   piano '(study)
  56. )